﻿Imports Persistencia
Public Class ctrPesquisa
#Region "Variáveis"

    Dim objPesquisa As New perPesquisa

#End Region

#Region "Funções"
    Public Function Pesquisa(ByVal pSql As String) As DataSet

        Pesquisa = objPesquisa.DSPesquisa(pSql)

    End Function

#End Region


End Class
